COMMENT ā   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	(defun save ()
C00003 ENDMK
Cā;
(defun save ()
       (gc)
       (setq em:no-init t)
       (fasload emaclsp fas dsk (mac lsp))
       (fasload eaid fas dsk (mac lsp))
       (suspend '|save foo|) 
       (cond (si:ecalledp
	      (setq -em:herald- ())
	      (em:mail-interface-initialize))))